3.1387 \(\int \frac{(5-x) (2+3 x^2)^{5/2}}{(3+2 x)^2} \, dx\)

Optimal. Leaf size=117 \[ -\frac{(x+34) \left (3 x^2+2\right )^{5/2}}{10 (2 x+3)}-\frac{1}{24} (310-153 x) \left (3 x^2+2\right )^{3/2}-\frac{7}{16} (775-243 x) \sqrt{3 x^2+2}+\frac{5425}{32} \sqrt{35} \tanh ^{-1}\left (\frac{4-9 x}{\sqrt{35} \sqrt{3 x^2+2}}\right )+\frac{18543}{32} \sqrt{3} \sinh ^{-1}\left (\sqrt{\frac{3}{2}} x\right ) \]

[Out]

(-7*(775 - 243*x)*Sqrt[2 + 3*x^2])/16 - ((310 - 153*x)*(2 + 3*x^2)^(3/2))/24 - ((34 + x)*(2 + 3*x^2)^(5/2))/(1
0*(3 + 2*x)) + (18543*Sqrt[3]*ArcSinh[Sqrt[3/2]*x])/32 + (5425*Sqrt[35]*ArcTanh[(4 - 9*x)/(Sqrt[35]*Sqrt[2 + 3
*x^2])])/32

________________________________________________________________________________________

Rubi [A]  time = 0.0783686, antiderivative size = 117, normalized size of antiderivative = 1., number of steps used = 7, number of rules used = 6, integrand size = 24, \(\frac{\text{number of rules}}{\text{integrand size}}\) = 0.25, Rules used = {813, 815, 844, 215, 725, 206} \[ -\frac{(x+34) \left (3 x^2+2\right )^{5/2}}{10 (2 x+3)}-\frac{1}{24} (310-153 x) \left (3 x^2+2\right )^{3/2}-\frac{7}{16} (775-243 x) \sqrt{3 x^2+2}+\frac{5425}{32} \sqrt{35} \tanh ^{-1}\left (\frac{4-9 x}{\sqrt{35} \sqrt{3 x^2+2}}\right )+\frac{18543}{32} \sqrt{3} \sinh ^{-1}\left (\sqrt{\frac{3}{2}} x\right ) \]

Antiderivative was successfully verified.

[In]

Int[((5 - x)*(2 + 3*x^2)^(5/2))/(3 + 2*x)^2,x]

[Out]

(-7*(775 - 243*x)*Sqrt[2 + 3*x^2])/16 - ((310 - 153*x)*(2 + 3*x^2)^(3/2))/24 - ((34 + x)*(2 + 3*x^2)^(5/2))/(1
0*(3 + 2*x)) + (18543*Sqrt[3]*ArcSinh[Sqrt[3/2]*x])/32 + (5425*Sqrt[35]*ArcTanh[(4 - 9*x)/(Sqrt[35]*Sqrt[2 + 3
*x^2])])/32

Rule 813

Int[((d_.) + (e_.)*(x_))^(m_)*((f_.) + (g_.)*(x_))*((a_) + (c_.)*(x_)^2)^(p_.), x_Symbol] :> Simp[((d + e*x)^(
m + 1)*(e*f*(m + 2*p + 2) - d*g*(2*p + 1) + e*g*(m + 1)*x)*(a + c*x^2)^p)/(e^2*(m + 1)*(m + 2*p + 2)), x] + Di
st[p/(e^2*(m + 1)*(m + 2*p + 2)), Int[(d + e*x)^(m + 1)*(a + c*x^2)^(p - 1)*Simp[g*(2*a*e + 2*a*e*m) + (g*(2*c
*d + 4*c*d*p) - 2*c*e*f*(m + 2*p + 2))*x, x], x], x] /; FreeQ[{a, c, d, e, f, g, m}, x] && NeQ[c*d^2 + a*e^2,
0] && RationalQ[p] && p > 0 && (LtQ[m, -1] || EqQ[p, 1] || (IntegerQ[p] &&  !RationalQ[m])) && NeQ[m, -1] &&
!ILtQ[m + 2*p + 1, 0] && (IntegerQ[m] || IntegerQ[p] || IntegersQ[2*m, 2*p])

Rule 815

Int[((d_.) + (e_.)*(x_))^(m_)*((f_.) + (g_.)*(x_))*((a_) + (c_.)*(x_)^2)^(p_.), x_Symbol] :> Simp[((d + e*x)^(
m + 1)*(c*e*f*(m + 2*p + 2) - g*c*d*(2*p + 1) + g*c*e*(m + 2*p + 1)*x)*(a + c*x^2)^p)/(c*e^2*(m + 2*p + 1)*(m
+ 2*p + 2)), x] + Dist[(2*p)/(c*e^2*(m + 2*p + 1)*(m + 2*p + 2)), Int[(d + e*x)^m*(a + c*x^2)^(p - 1)*Simp[f*a
*c*e^2*(m + 2*p + 2) + a*c*d*e*g*m - (c^2*f*d*e*(m + 2*p + 2) - g*(c^2*d^2*(2*p + 1) + a*c*e^2*(m + 2*p + 1)))
*x, x], x], x] /; FreeQ[{a, c, d, e, f, g, m}, x] && NeQ[c*d^2 + a*e^2, 0] && GtQ[p, 0] && (IntegerQ[p] ||  !R
ationalQ[m] || (GeQ[m, -1] && LtQ[m, 0])) &&  !ILtQ[m + 2*p, 0] && (IntegerQ[m] || IntegerQ[p] || IntegersQ[2*
m, 2*p])

Rule 844

Int[((d_.) + (e_.)*(x_))^(m_)*((f_.) + (g_.)*(x_))*((a_) + (c_.)*(x_)^2)^(p_.), x_Symbol] :> Dist[g/e, Int[(d
+ e*x)^(m + 1)*(a + c*x^2)^p, x], x] + Dist[(e*f - d*g)/e, Int[(d + e*x)^m*(a + c*x^2)^p, x], x] /; FreeQ[{a,
c, d, e, f, g, m, p}, x] && NeQ[c*d^2 + a*e^2, 0] &&  !IGtQ[m, 0]

Rule 215

Int[1/Sqrt[(a_) + (b_.)*(x_)^2], x_Symbol] :> Simp[ArcSinh[(Rt[b, 2]*x)/Sqrt[a]]/Rt[b, 2], x] /; FreeQ[{a, b},
x] && GtQ[a, 0] && PosQ[b]

Rule 725

Int[1/(((d_) + (e_.)*(x_))*Sqrt[(a_) + (c_.)*(x_)^2]), x_Symbol] :> -Subst[Int[1/(c*d^2 + a*e^2 - x^2), x], x,
(a*e - c*d*x)/Sqrt[a + c*x^2]] /; FreeQ[{a, c, d, e}, x]

Rule 206

Int[((a_) + (b_.)*(x_)^2)^(-1), x_Symbol] :> Simp[(1*ArcTanh[(Rt[-b, 2]*x)/Rt[a, 2]])/(Rt[a, 2]*Rt[-b, 2]), x]
/; FreeQ[{a, b}, x] && NegQ[a/b] && (GtQ[a, 0] || LtQ[b, 0])

Rubi steps

\begin{align*} \int \frac{(5-x) \left (2+3 x^2\right )^{5/2}}{(3+2 x)^2} \, dx &=-\frac{(34+x) \left (2+3 x^2\right )^{5/2}}{10 (3+2 x)}-\frac{1}{8} \int \frac{(8-408 x) \left (2+3 x^2\right )^{3/2}}{3+2 x} \, dx\\ &=-\frac{1}{24} (310-153 x) \left (2+3 x^2\right )^{3/2}-\frac{(34+x) \left (2+3 x^2\right )^{5/2}}{10 (3+2 x)}-\frac{1}{384} \int \frac{(15456-163296 x) \sqrt{2+3 x^2}}{3+2 x} \, dx\\ &=-\frac{7}{16} (775-243 x) \sqrt{2+3 x^2}-\frac{1}{24} (310-153 x) \left (2+3 x^2\right )^{3/2}-\frac{(34+x) \left (2+3 x^2\right )^{5/2}}{10 (3+2 x)}-\frac{\int \frac{6620544-32042304 x}{(3+2 x) \sqrt{2+3 x^2}} \, dx}{9216}\\ &=-\frac{7}{16} (775-243 x) \sqrt{2+3 x^2}-\frac{1}{24} (310-153 x) \left (2+3 x^2\right )^{3/2}-\frac{(34+x) \left (2+3 x^2\right )^{5/2}}{10 (3+2 x)}+\frac{55629}{32} \int \frac{1}{\sqrt{2+3 x^2}} \, dx-\frac{189875}{32} \int \frac{1}{(3+2 x) \sqrt{2+3 x^2}} \, dx\\ &=-\frac{7}{16} (775-243 x) \sqrt{2+3 x^2}-\frac{1}{24} (310-153 x) \left (2+3 x^2\right )^{3/2}-\frac{(34+x) \left (2+3 x^2\right )^{5/2}}{10 (3+2 x)}+\frac{18543}{32} \sqrt{3} \sinh ^{-1}\left (\sqrt{\frac{3}{2}} x\right )+\frac{189875}{32} \operatorname{Subst}\left (\int \frac{1}{35-x^2} \, dx,x,\frac{4-9 x}{\sqrt{2+3 x^2}}\right )\\ &=-\frac{7}{16} (775-243 x) \sqrt{2+3 x^2}-\frac{1}{24} (310-153 x) \left (2+3 x^2\right )^{3/2}-\frac{(34+x) \left (2+3 x^2\right )^{5/2}}{10 (3+2 x)}+\frac{18543}{32} \sqrt{3} \sinh ^{-1}\left (\sqrt{\frac{3}{2}} x\right )+\frac{5425}{32} \sqrt{35} \tanh ^{-1}\left (\frac{4-9 x}{\sqrt{35} \sqrt{2+3 x^2}}\right )\\ \end{align*}

Mathematica [A]  time = 0.136162, size = 97, normalized size = 0.83 \[ \frac{1}{480} \left (-\frac{2 \sqrt{3 x^2+2} \left (216 x^5-1836 x^4+5118 x^3-19458 x^2+89521 x+265989\right )}{2 x+3}+81375 \sqrt{35} \tanh ^{-1}\left (\frac{4-9 x}{\sqrt{35} \sqrt{3 x^2+2}}\right )+278145 \sqrt{3} \sinh ^{-1}\left (\sqrt{\frac{3}{2}} x\right )\right ) \]

Antiderivative was successfully verified.

[In]

Integrate[((5 - x)*(2 + 3*x^2)^(5/2))/(3 + 2*x)^2,x]

[Out]

((-2*Sqrt[2 + 3*x^2]*(265989 + 89521*x - 19458*x^2 + 5118*x^3 - 1836*x^4 + 216*x^5))/(3 + 2*x) + 278145*Sqrt[3
]*ArcSinh[Sqrt[3/2]*x] + 81375*Sqrt[35]*ArcTanh[(4 - 9*x)/(Sqrt[35]*Sqrt[2 + 3*x^2])])/480

________________________________________________________________________________________

Maple [A]  time = 0.01, size = 164, normalized size = 1.4 \begin{align*} -{\frac{31}{35} \left ( 3\, \left ( x+3/2 \right ) ^{2}-9\,x-{\frac{19}{4}} \right ) ^{{\frac{5}{2}}}}+{\frac{51\,x}{8} \left ( 3\, \left ( x+3/2 \right ) ^{2}-9\,x-{\frac{19}{4}} \right ) ^{{\frac{3}{2}}}}+{\frac{1701\,x}{16}\sqrt{3\, \left ( x+3/2 \right ) ^{2}-9\,x-{\frac{19}{4}}}}+{\frac{18543\,\sqrt{3}}{32}{\it Arcsinh} \left ({\frac{x\sqrt{6}}{2}} \right ) }-{\frac{155}{12} \left ( 3\, \left ( x+3/2 \right ) ^{2}-9\,x-{\frac{19}{4}} \right ) ^{{\frac{3}{2}}}}-{\frac{5425}{32}\sqrt{12\, \left ( x+3/2 \right ) ^{2}-36\,x-19}}+{\frac{5425\,\sqrt{35}}{32}{\it Artanh} \left ({\frac{ \left ( 8-18\,x \right ) \sqrt{35}}{35}{\frac{1}{\sqrt{12\, \left ( x+3/2 \right ) ^{2}-36\,x-19}}}} \right ) }-{\frac{13}{70} \left ( 3\, \left ( x+3/2 \right ) ^{2}-9\,x-{\frac{19}{4}} \right ) ^{{\frac{7}{2}}} \left ( x+{\frac{3}{2}} \right ) ^{-1}}+{\frac{39\,x}{70} \left ( 3\, \left ( x+3/2 \right ) ^{2}-9\,x-{\frac{19}{4}} \right ) ^{{\frac{5}{2}}}} \end{align*}

Verification of antiderivative is not currently implemented for this CAS.

[In]

int((5-x)*(3*x^2+2)^(5/2)/(3+2*x)^2,x)

[Out]

-31/35*(3*(x+3/2)^2-9*x-19/4)^(5/2)+51/8*x*(3*(x+3/2)^2-9*x-19/4)^(3/2)+1701/16*x*(3*(x+3/2)^2-9*x-19/4)^(1/2)
+18543/32*arcsinh(1/2*x*6^(1/2))*3^(1/2)-155/12*(3*(x+3/2)^2-9*x-19/4)^(3/2)-5425/32*(12*(x+3/2)^2-36*x-19)^(1
/2)+5425/32*35^(1/2)*arctanh(2/35*(4-9*x)*35^(1/2)/(12*(x+3/2)^2-36*x-19)^(1/2))-13/70/(x+3/2)*(3*(x+3/2)^2-9*
x-19/4)^(7/2)+39/70*x*(3*(x+3/2)^2-9*x-19/4)^(5/2)

________________________________________________________________________________________

Maxima [A]  time = 1.54035, size = 165, normalized size = 1.41 \begin{align*} -\frac{1}{20} \,{\left (3 \, x^{2} + 2\right )}^{\frac{5}{2}} + \frac{51}{8} \,{\left (3 \, x^{2} + 2\right )}^{\frac{3}{2}} x - \frac{155}{12} \,{\left (3 \, x^{2} + 2\right )}^{\frac{3}{2}} - \frac{13 \,{\left (3 \, x^{2} + 2\right )}^{\frac{5}{2}}}{4 \,{\left (2 \, x + 3\right )}} + \frac{1701}{16} \, \sqrt{3 \, x^{2} + 2} x + \frac{18543}{32} \, \sqrt{3} \operatorname{arsinh}\left (\frac{1}{2} \, \sqrt{6} x\right ) - \frac{5425}{32} \, \sqrt{35} \operatorname{arsinh}\left (\frac{3 \, \sqrt{6} x}{2 \,{\left | 2 \, x + 3 \right |}} - \frac{2 \, \sqrt{6}}{3 \,{\left | 2 \, x + 3 \right |}}\right ) - \frac{5425}{16} \, \sqrt{3 \, x^{2} + 2} \end{align*}

Verification of antiderivative is not currently implemented for this CAS.

[In]

integrate((5-x)*(3*x^2+2)^(5/2)/(3+2*x)^2,x, algorithm="maxima")

[Out]

-1/20*(3*x^2 + 2)^(5/2) + 51/8*(3*x^2 + 2)^(3/2)*x - 155/12*(3*x^2 + 2)^(3/2) - 13/4*(3*x^2 + 2)^(5/2)/(2*x +
3) + 1701/16*sqrt(3*x^2 + 2)*x + 18543/32*sqrt(3)*arcsinh(1/2*sqrt(6)*x) - 5425/32*sqrt(35)*arcsinh(3/2*sqrt(6
)*x/abs(2*x + 3) - 2/3*sqrt(6)/abs(2*x + 3)) - 5425/16*sqrt(3*x^2 + 2)

________________________________________________________________________________________

Fricas [A]  time = 1.9677, size = 378, normalized size = 3.23 \begin{align*} \frac{278145 \, \sqrt{3}{\left (2 \, x + 3\right )} \log \left (-\sqrt{3} \sqrt{3 \, x^{2} + 2} x - 3 \, x^{2} - 1\right ) + 81375 \, \sqrt{35}{\left (2 \, x + 3\right )} \log \left (\frac{\sqrt{35} \sqrt{3 \, x^{2} + 2}{\left (9 \, x - 4\right )} - 93 \, x^{2} + 36 \, x - 43}{4 \, x^{2} + 12 \, x + 9}\right ) - 4 \,{\left (216 \, x^{5} - 1836 \, x^{4} + 5118 \, x^{3} - 19458 \, x^{2} + 89521 \, x + 265989\right )} \sqrt{3 \, x^{2} + 2}}{960 \,{\left (2 \, x + 3\right )}} \end{align*}

Verification of antiderivative is not currently implemented for this CAS.

[In]

integrate((5-x)*(3*x^2+2)^(5/2)/(3+2*x)^2,x, algorithm="fricas")

[Out]

1/960*(278145*sqrt(3)*(2*x + 3)*log(-sqrt(3)*sqrt(3*x^2 + 2)*x - 3*x^2 - 1) + 81375*sqrt(35)*(2*x + 3)*log((sq
rt(35)*sqrt(3*x^2 + 2)*(9*x - 4) - 93*x^2 + 36*x - 43)/(4*x^2 + 12*x + 9)) - 4*(216*x^5 - 1836*x^4 + 5118*x^3
- 19458*x^2 + 89521*x + 265989)*sqrt(3*x^2 + 2))/(2*x + 3)

________________________________________________________________________________________

Sympy [F(-1)]  time = 0., size = 0, normalized size = 0. \begin{align*} \text{Timed out} \end{align*}

Verification of antiderivative is not currently implemented for this CAS.

[In]

integrate((5-x)*(3*x**2+2)**(5/2)/(3+2*x)**2,x)

[Out]

Timed out

________________________________________________________________________________________

Giac [B]  time = 2.01361, size = 898, normalized size = 7.68 \begin{align*} \text{result too large to display} \end{align*}

Verification of antiderivative is not currently implemented for this CAS.

[In]

integrate((5-x)*(3*x^2+2)^(5/2)/(3+2*x)^2,x, algorithm="giac")

[Out]

5425/32*sqrt(35)*log(sqrt(35)*(sqrt(-18/(2*x + 3) + 35/(2*x + 3)^2 + 3) + sqrt(35)/(2*x + 3)) - 9)*sgn(1/(2*x
+ 3)) - 18543/32*sqrt(3)*log(1/2*abs(-2*sqrt(3) + 2*sqrt(-18/(2*x + 3) + 35/(2*x + 3)^2 + 3) + 2*sqrt(35)/(2*x
+ 3))/(sqrt(3) + sqrt(-18/(2*x + 3) + 35/(2*x + 3)^2 + 3) + sqrt(35)/(2*x + 3)))*sgn(1/(2*x + 3)) - 15925/128
*sqrt(-18/(2*x + 3) + 35/(2*x + 3)^2 + 3)*sgn(1/(2*x + 3)) + 9/320*(238455*(sqrt(-18/(2*x + 3) + 35/(2*x + 3)^
2 + 3) + sqrt(35)/(2*x + 3))^9*sgn(1/(2*x + 3)) - 149045*sqrt(35)*(sqrt(-18/(2*x + 3) + 35/(2*x + 3)^2 + 3) +
sqrt(35)/(2*x + 3))^8*sgn(1/(2*x + 3)) - 697600*(sqrt(-18/(2*x + 3) + 35/(2*x + 3)^2 + 3) + sqrt(35)/(2*x + 3)
)^7*sgn(1/(2*x + 3)) + 719040*sqrt(35)*(sqrt(-18/(2*x + 3) + 35/(2*x + 3)^2 + 3) + sqrt(35)/(2*x + 3))^6*sgn(1
/(2*x + 3)) + 4150566*(sqrt(-18/(2*x + 3) + 35/(2*x + 3)^2 + 3) + sqrt(35)/(2*x + 3))^5*sgn(1/(2*x + 3)) - 270
7250*sqrt(35)*(sqrt(-18/(2*x + 3) + 35/(2*x + 3)^2 + 3) + sqrt(35)/(2*x + 3))^4*sgn(1/(2*x + 3)) - 6756120*(sq
rt(-18/(2*x + 3) + 35/(2*x + 3)^2 + 3) + sqrt(35)/(2*x + 3))^3*sgn(1/(2*x + 3)) + 4557000*sqrt(35)*(sqrt(-18/(
2*x + 3) + 35/(2*x + 3)^2 + 3) + sqrt(35)/(2*x + 3))^2*sgn(1/(2*x + 3)) + 3563595*(sqrt(-18/(2*x + 3) + 35/(2*
x + 3)^2 + 3) + sqrt(35)/(2*x + 3))*sgn(1/(2*x + 3)) - 2833425*sqrt(35)*sgn(1/(2*x + 3)))/((sqrt(-18/(2*x + 3)
+ 35/(2*x + 3)^2 + 3) + sqrt(35)/(2*x + 3))^2 - 3)^5